"anesthetic" <-
structure(list(move = c(0, 1, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0, 0, 
0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0), conc = c(1, 
1.2, 1.4, 1.4, 1.2, 2.5, 1.6, 0.8, 1.6, 1.4, 0.8, 1.6, 2.5, 1.4, 
1.6, 1.4, 1.4, 0.8, 0.8, 1.2, 0.8, 0.8, 1, 0.8, 1, 1.2, 1, 1.2, 
1, 1.2), logconc = c(0, 0.182321556793955, 0.336472236621213, 
0.336472236621213, 0.182321556793955, 0.916290731874155, 0.470003629245736, 
-0.22314355131421, 0.470003629245736, 0.336472236621213, -0.22314355131421, 
0.470003629245736, 0.916290731874155, 0.336472236621213, 0.470003629245736, 
0.336472236621213, 0.336472236621213, -0.22314355131421, -0.22314355131421, 
0.182321556793955, -0.22314355131421, -0.22314355131421, 0, -0.22314355131421, 
0, 0.182321556793955, 0, 0.182321556793955, 0, 0.182321556793955
), nomove = c(1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 
1, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1)), .Names = c("move", 
"conc", "logconc", "nomove"), class = "data.frame", row.names = c("1", 
"2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", 
"14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", 
"25", "26", "27", "28", "29", "30"))
